Holt Researcher: American History/Holt Researcher: American History.iso/pc/modules/tour.dxr/00414.ls

Text File | 2000-01-21 | 670 b | 26 lines

on exitFrame
  global gMenuButton, gMenuExit, gTourForwardArrow, gTourBackArrow, gCurrLabel, gPlaySound, audioPath
  if the frameLabel <> 0 then
    gCurrLabel = the frameLabel
  end if
  if gPlaySound then
    gPlaySound = 0
    soundFile = getAudioFile(the frame)
    sound playFile 1, audioPath & soundFile & ".AIF"
  end if
  repeat with rc in [gMenuButton, gMenuExit, gTourForwardArrow, gTourBackArrow]
    doRollover(rc)
  end repeat
  if soundBusy(1) then
    go(the frame)
  else
    repeat with z = 2 to 10
      if not (the memberNum of sprite z = 0) then
        sprite(z).visible = 1
      end if
    end repeat
    gPlaySound = 1
    go(#next)
  end if
end